# -*- mode: snippet -*-
# name: Matrix inverse 
# key: matinv
# --
## Matrix inverse 
MatInv <- function(A){out = chol2inv(chol(A))}
`yas/selected-text`$0